// Ejercicios con la Clase TRecBrowse

//----------------------------------------------------------------------------//

function Main()

  local rbr

  USE Test

  SET COLOR TO "W+/B, N/BG"
  rbr = TRecBrowse():New( 3, 3, 20, 40 )

  rbr:Exec()

return

//----------------------------------------------------------------------------//
